home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'AHMTLogWindow.pas' rev: 3.00
-
- #ifndef AHMTLogWindowHPP
- #define AHMTLogWindowHPP
- #include <AHMFreeware.hpp>
- #include <Printers.hpp>
- #include <Menus.hpp>
- #include <StdCtrls.hpp>
- #include <ComCtrls.hpp>
- #include <ExtCtrls.hpp>
- #include <Dialogs.hpp>
- #include <Forms.hpp>
- #include <Controls.hpp>
- #include <Graphics.hpp>
- #include <Classes.hpp>
- #include <SysUtils.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Ahmtlogwindow
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TAHMLogWindowForm;
- class PASCALIMPLEMENTATION TAHMLogWindowForm : public Forms::TForm
- {
- typedef Forms::TForm inherited;
-
- __published:
- Comctrls::TRichEdit* RichEdit1;
- Menus::TMainMenu* MainMenu1;
- Menus::TMenuItem* File1;
- Menus::TMenuItem* Edit1;
- Menus::TMenuItem* New1;
- Menus::TMenuItem* Open1;
- Menus::TMenuItem* Save1;
- Menus::TMenuItem* N1;
- Menus::TMenuItem* Print1;
- Menus::TMenuItem* N2;
- Menus::TMenuItem* Exit1;
- Menus::TMenuItem* WordWrap1;
- Dialogs::TPrintDialog* PrintDialog1;
- Dialogs::TOpenDialog* OpenDialog1;
- Dialogs::TSaveDialog* SaveDialog1;
- Menus::TMenuItem* Font1;
- Menus::TMenuItem* N3;
- Dialogs::TFontDialog* FontDialog1;
- Menus::TMenuItem* Background1;
- Dialogs::TColorDialog* ColorDialog1;
- void __fastcall Print1Click(System::TObject* Sender);
- void __fastcall New1Click(System::TObject* Sender);
- void __fastcall Open1Click(System::TObject* Sender);
- void __fastcall Save1Click(System::TObject* Sender);
- void __fastcall Font1Click(System::TObject* Sender);
- void __fastcall WordWrap1Click(System::TObject* Sender);
- void __fastcall Exit1Click(System::TObject* Sender);
- void __fastcall Background1Click(System::TObject* Sender);
-
- public:
- Classes::TNotifyEvent aexit;
- Classes::TNotifyEvent aopen;
- Classes::TNotifyEvent asave;
- public:
- /* TCustomForm.Create */ __fastcall virtual TAHMLogWindowForm(Classes::TComponent* AOwner) : Forms::
- TForm(AOwner) { }
- /* TCustomForm.CreateNew */ __fastcall TAHMLogWindowForm(Classes::TComponent* AOwner, int Dummy) :
- Forms::TForm(AOwner, Dummy) { }
- /* TCustomForm.Destroy */ __fastcall virtual ~TAHMLogWindowForm(void) { }
-
- public:
- /* TWinControl.CreateParented */ __fastcall TAHMLogWindowForm(HWND ParentWindow) : Forms::TForm(ParentWindow
- ) { }
-
- };
-
- class DELPHICLASS TAHMLogWindow;
- class PASCALIMPLEMENTATION TAHMLogWindow : public Classes::TComponent
- {
- typedef Classes::TComponent inherited;
-
- private:
- Ahmfreeware::TAHMAboutFreeStr FAbout;
- System::AnsiString fedcap;
- System::AnsiString ffil;
- Graphics::TColor fbcol;
- Classes::TNotifyEvent fonsave;
- Classes::TNotifyEvent fonexit;
- Classes::TNotifyEvent fonexec;
- Graphics::TFont* ffon;
- bool dN1;
- bool fload;
- TPosition fwpos;
- int fheight;
- int fwidth;
- Forms::TBorderIcons fbord;
- bool freado;
- Graphics::TIcon* fico;
- TWindowState fwstate;
- void __fastcall Setfont(Graphics::TFont* value);
- void __fastcall SetMenuFile(bool value);
- void __fastcall SetBordericons(Forms::TBorderIcons value);
- void __fastcall SetIco(Graphics::TIcon* value);
-
- public:
- __fastcall virtual TAHMLogWindow(Classes::TComponent* AOwner);
- __fastcall virtual ~TAHMLogWindow(void);
- bool __fastcall execute(void);
- void __fastcall Log(System::AnsiString value);
- void __fastcall Clear(void);
-
- __published:
- __property Ahmfreeware::TAHMAboutFreeStr About = {read=FAbout, write=FAbout};
- __property System::AnsiString LogWindowCaption = {read=fedcap, write=fedcap};
- __property Graphics::TColor LogWindowColor = {read=fbcol, write=fbcol, nodefault};
- __property Graphics::TFont* LogWindowFonts = {read=ffon, write=Setfont};
- __property bool FileMenu = {read=dN1, write=SetMenuFile, nodefault};
- __property System::AnsiString OpenFilename = {read=ffil, write=ffil};
- __property bool OpenFileOnExecute = {read=fload, write=fload, nodefault};
- __property Classes::TNotifyEvent OnExecute = {read=fonexec, write=fonexec};
- __property Classes::TNotifyEvent OnExit = {read=fonexit, write=fonexit};
- __property Classes::TNotifyEvent OnSaveFile = {read=fonsave, write=fonsave};
- __property Forms::TWindowState Windowstate = {read=fwstate, write=fwstate, nodefault};
- __property Forms::TPosition WindowPosition = {read=fwpos, write=fwpos, nodefault};
- __property Forms::TBorderIcons BorderIcons = {read=fbord, write=SetBordericons, nodefault};
- __property int WindowWidth = {read=fwidth, write=fwidth, nodefault};
- __property int WindowHeight = {read=fheight, write=fheight, nodefault};
- __property bool Readonly = {read=freado, write=freado, nodefault};
- __property Graphics::TIcon* LogWindowIcon = {read=fico, write=SetIco};
- };
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE TAHMLogWindowForm* fvwf;
-
- } /* namespace Ahmtlogwindow */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Ahmtlogwindow;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // AHMTLogWindow
-